www.gusucode.com > 智睿学校网站管理系统 V2.20 > 智睿学校网站管理系统 V2.20\code\Include\lockyou.asp
<!--#include file="lockipfun.asp"--> <% dim stop_ip,un_ip,rs_ip vae() un_ip=0 stop_ip= Request.ServerVariables("HTTP_X_FORWARDED_FOR") If stop_ip="" Then stop_ip= Request.ServerVariables("REMOTE_ADDR") call fiship(stop_ip) if un_ip=0 then set rs_ip=conn.execute("select viw From zhi_rui_s_stopip where viw<>0 and ("&fishcip(stop_ip)&" between oneip and endip)",0,1) if not rs_ip.eof then if rs_ip("viw")=1 then Response.write"对不起,您的IP已被锁定.如有疑问,请联系我们!<br>" rs_ip.close set rs_ip=nothing Response.end end if end if Sipki %>